object Form1: TForm1
  Left = 329
  Top = 116
  Width = 1248
  Height = 795
  Caption = #1057#1090#1072#1090#1080#1089#1090#1080#1082#1072' '#1057#1052#1057
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object gStats: TcxGrid
    Left = 0
    Top = 23
    Width = 1240
    Height = 745
    Align = alClient
    BorderWidth = 5
    TabOrder = 0
    object vStats: TcxGridDBTableView
      NavigatorButtons.ConfirmDelete = False
      OnCustomDrawCell = vStatsCustomDrawCell
      DataController.DataSource = ds
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <
        item
          Kind = skCount
          Column = vStatsPID
        end
        item
          Format = '##.'
          Kind = skSum
          Column = vStatsWASTED_COUNT
        end
        item
          Format = '##.'
          Kind = skSum
          Column = vStatsFULL_WASTED_COUNT
        end
        item
          Format = '##.'
          Kind = skSum
          Column = vStatsDELIVERED_COUNT
        end
        item
          Format = '##.'
          Kind = skSum
          Column = vStatsFULL_DELIVERED_COUNT
        end>
      DataController.Summary.SummaryGroups = <>
      OptionsData.Deleting = False
      OptionsData.Editing = False
      OptionsData.Inserting = False
      OptionsSelection.CellSelect = False
      OptionsView.Footer = True
      OptionsView.GroupByBox = False
      object vStatsPID: TcxGridDBColumn
        DataBinding.FieldName = 'PID'
        Width = 38
      end
      object vStatsPHONE: TcxGridDBColumn
        Caption = #1058#1077#1083#1077#1092#1086#1085
        DataBinding.FieldName = 'PHONE'
        Width = 83
      end
      object vStatsAVAILABLE: TcxGridDBColumn
        Caption = #1056#1072#1089#1089#1099#1083#1082#1072
        DataBinding.FieldName = 'AVAILABLE'
        Width = 45
      end
      object vStatsWD_RATIO: TcxGridDBColumn
        DataBinding.FieldName = 'WD_RATIO'
      end
      object vStatsWRONG_NUMBER: TcxGridDBColumn
        Caption = #1053#1077#1087#1088#1072#1074#1080#1083#1100#1085#1099#1081' '#1085#1086#1084#1077#1088
        DataBinding.FieldName = 'WRONG_NUMBER'
        Width = 45
      end
      object vStatsERROR_COUNT: TcxGridDBColumn
        Caption = #1054#1096#1080#1073#1086#1082' '#1086#1090#1087#1088#1072#1074#1082#1080
        DataBinding.FieldName = 'ERROR_COUNT'
        Width = 45
      end
      object vStatsWASTED_COUNT: TcxGridDBColumn
        Caption = #1055#1086#1090#1088#1072#1095#1077#1085#1086
        DataBinding.FieldName = 'WASTED_COUNT'
        Width = 45
      end
      object vStatsFULL_WASTED_COUNT: TcxGridDBColumn
        Caption = #1055#1086#1090#1088#1072#1095#1077#1085#1086'('#1095#1072#1089#1090#1077#1081')'
        DataBinding.FieldName = 'FULL_WASTED_COUNT'
        Width = 45
      end
      object vStatsDELIVERED_COUNT: TcxGridDBColumn
        Caption = #1044#1086#1089#1090#1072#1074#1083#1077#1085#1086
        DataBinding.FieldName = 'DELIVERED_COUNT'
        Width = 45
      end
      object vStatsFULL_DELIVERED_COUNT: TcxGridDBColumn
        Caption = #1044#1086#1089#1090#1072#1074#1083#1077#1085#1086'('#1095#1072#1089#1090#1077#1081')'
        DataBinding.FieldName = 'FULL_DELIVERED_COUNT'
        Width = 45
      end
      object vStatsMISSED_COUNT: TcxGridDBColumn
        Caption = #1055#1086#1090#1077#1088#1103#1085#1086
        DataBinding.FieldName = 'MISSED_COUNT'
        Width = 45
      end
      object vStatsEXPIRED_COUNT: TcxGridDBColumn
        Caption = #1048#1089#1090#1077#1082#1083#1080
        DataBinding.FieldName = 'EXPIRED_COUNT'
        Width = 45
      end
      object vStatsUNDELIVERED_COUNT: TcxGridDBColumn
        Caption = #1053#1077#1076#1086#1089#1090#1072#1074#1083#1077#1085#1099
        DataBinding.FieldName = 'UNDELIVERED_COUNT'
        Width = 45
      end
      object vStatsACCEPTED_COUNT: TcxGridDBColumn
        Caption = #1055#1088#1080#1085#1103#1090#1086' '#1074' '#1086#1073#1088#1072#1073#1086#1090#1082#1091
        DataBinding.FieldName = 'ACCEPTED_COUNT'
        Width = 45
      end
      object vStatsREJECTED_COUNT: TcxGridDBColumn
        Caption = #1054#1090#1074#1077#1088#1075#1085#1091#1090#1086' '#1080#1079' '#1086#1073#1088#1072#1073#1086#1090#1082#1080
        DataBinding.FieldName = 'REJECTED_COUNT'
        Width = 45
      end
      object vStatsDELETED_COUNT: TcxGridDBColumn
        Caption = #1059#1076#1072#1083#1077#1085#1086' '#1080#1079' '#1086#1095#1077#1088#1077#1076#1080
        DataBinding.FieldName = 'DELETED_COUNT'
        Width = 45
      end
      object vStatsUNKNOWN_COUNT: TcxGridDBColumn
        Caption = #1053#1077#1080#1079#1074#1077#1089#1090#1085#1086
        DataBinding.FieldName = 'UNKNOWN_COUNT'
        Width = 45
      end
      object vStatsSTATUS_LIST: TcxGridDBColumn
        Caption = #1057#1087#1080#1089#1086#1082' '#1089#1086#1089#1090#1086#1103#1085#1080#1081
        DataBinding.FieldName = 'STATUS_LIST'
        Width = 450
      end
      object vStatsSORT_ORDER: TcxGridDBColumn
        DataBinding.FieldName = 'SORT_ORDER'
        Visible = False
        VisibleForCustomization = False
      end
    end
    object gStatsLevel1: TcxGridLevel
      GridView = vStats
    end
  end
  object pTop: TPanel
    Left = 0
    Top = 0
    Width = 1240
    Height = 23
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 1
    object cShowList: TCheckBox
      Left = 5
      Top = 5
      Width = 196
      Height = 17
      Caption = #1057#1087#1080#1089#1086#1082' '#1089#1086#1089#1090#1086#1103#1085#1080#1081' '#1074' '#1086#1076#1085#1091' '#1089#1090#1088#1086#1082#1091
      Checked = True
      State = cbChecked
      TabOrder = 0
      OnClick = cShowListClick
    end
  end
  object db: TpFIBDatabase
    AutoReconnect = True
    Connected = True
    DBName = 'servprog:olympicdb'
    DBParams.Strings = (
      'sql_role_name=CANWR'
      'user_name=vminich'
      'password=kotosh')
    DefaultTransaction = tr
    SQLDialect = 3
    Timeout = 0
    WaitForRestoreConnect = 0
    Left = 48
    Top = 48
  end
  object qStats: TpFIBDataSet
    SelectSQL.Strings = (
      
        'select * from GET_SMS_STATS order by SORT_ORDER desc,WRONG_NUMBE' +
        'R desc,FULL_WASTED_COUNT desc,ERROR_COUNT desc,WASTED_COUNT desc')
    Transaction = tr
    Database = db
    Left = 88
    Top = 72
    object qStatsPID: TFIBIntegerField
      FieldName = 'PID'
    end
    object qStatsPHONE: TFIBStringField
      FieldName = 'PHONE'
      EmptyStrToNull = True
    end
    object qStatsWRONG_NUMBER: TFIBIntegerField
      FieldName = 'WRONG_NUMBER'
    end
    object qStatsERROR_COUNT: TFIBIntegerField
      FieldName = 'ERROR_COUNT'
    end
    object qStatsWASTED_COUNT: TFIBIntegerField
      FieldName = 'WASTED_COUNT'
    end
    object qStatsFULL_WASTED_COUNT: TFIBIntegerField
      FieldName = 'FULL_WASTED_COUNT'
    end
    object qStatsMISSED_COUNT: TFIBIntegerField
      FieldName = 'MISSED_COUNT'
    end
    object qStatsDELIVERED_COUNT: TFIBIntegerField
      FieldName = 'DELIVERED_COUNT'
    end
    object qStatsFULL_DELIVERED_COUNT: TFIBIntegerField
      FieldName = 'FULL_DELIVERED_COUNT'
    end
    object qStatsEXPIRED_COUNT: TFIBIntegerField
      FieldName = 'EXPIRED_COUNT'
    end
    object qStatsUNDELIVERED_COUNT: TFIBIntegerField
      FieldName = 'UNDELIVERED_COUNT'
    end
    object qStatsACCEPTED_COUNT: TFIBIntegerField
      FieldName = 'ACCEPTED_COUNT'
    end
    object qStatsREJECTED_COUNT: TFIBIntegerField
      FieldName = 'REJECTED_COUNT'
    end
    object qStatsDELETED_COUNT: TFIBIntegerField
      FieldName = 'DELETED_COUNT'
    end
    object qStatsUNKNOWN_COUNT: TFIBIntegerField
      FieldName = 'UNKNOWN_COUNT'
    end
    object qStatsSTATUS_LIST: TFIBStringField
      FieldName = 'STATUS_LIST'
      Size = 2048
      EmptyStrToNull = True
    end
    object qStatsSORT_ORDER: TFIBSmallIntField
      FieldName = 'SORT_ORDER'
      Visible = False
    end
    object qStatsAVAILABLE: TFIBBooleanField
      FieldName = 'AVAILABLE'
    end
    object qStatsWD_RATIO: TFIBBCDField
      DisplayLabel = #1055#1086#1090#1077#1088#1080
      DisplayWidth = 7
      FieldName = 'WD_RATIO'
      Size = 2
      RoundByScale = True
    end
  end
  object ds: TDataSource
    DataSet = qStats
    Left = 136
    Top = 72
  end
  object tr: TpFIBTransaction
    Active = True
    DefaultDatabase = db
    TimeoutAction = TARollback
    Left = 192
    Top = 72
  end
end
